home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / dlartv.z / dlartv
Text File  |  1996-03-14  |  2KB  |  67 lines
  1.  
  2.  
  3.  
  4. DDDDLLLLAAAARRRRTTTTVVVV((((3333FFFF))))                                                          DDDDLLLLAAAARRRRTTTTVVVV((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      DLARTV - applie a vector of real plane rotations to elements of the real
  10.      vectors x and y
  11.  
  12. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  13.      SUBROUTINE DLARTV( N, X, INCX, Y, INCY, C, S, INCC )
  14.  
  15.          INTEGER        INCC, INCX, INCY, N
  16.  
  17.          DOUBLE         PRECISION C( * ), S( * ), X( * ), Y( * )
  18.  
  19. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  20.      DLARTV applies a vector of real plane rotations to elements of the real
  21.      vectors x and y. For i = 1,2,...,n
  22.  
  23.         ( x(i) ) := (  c(i)  s(i) ) ( x(i) )
  24.         ( y(i) )    ( -s(i)  c(i) ) ( y(i) )
  25.  
  26.  
  27. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  28.      N       (input) INTEGER
  29.              The number of plane rotations to be applied.
  30.  
  31.      X       (input/output) DOUBLE PRECISION array,
  32.              dimension (1+(N-1)*INCX) The vector x.
  33.  
  34.      INCX    (input) INTEGER
  35.              The increment between elements of X. INCX > 0.
  36.  
  37.      Y       (input/output) DOUBLE PRECISION array,
  38.              dimension (1+(N-1)*INCY) The vector y.
  39.  
  40.      INCY    (input) INTEGER
  41.              The increment between elements of Y. INCY > 0.
  42.  
  43.      C       (input) DOUBLE PRECISION array, dimension (1+(N-1)*INCC)
  44.              The cosines of the plane rotations.
  45.  
  46.      S       (input) DOUBLE PRECISION array, dimension (1+(N-1)*INCC)
  47.              The sines of the plane rotations.
  48.  
  49.      INCC    (input) INTEGER
  50.              The increment between elements of C and S. INCC > 0.
  51.  
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.